Profile of (eval 217)[Sub/Quote.pm:3]

Filename	(eval 217)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 13 statements in 277µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	12µs	28µs	JSON::Schema::Modern::Error::::BEGIN@6 JSON::Schema::Modern::Error::BEGIN@6
1	1	1	5µs	13µs	Method::Generate::Accessor::_Generated::BEGIN@20
1	1	1	2µs	2µs	Method::Generate::Accessor::_Generated::BEGIN@11
0	0	0	0s	0s	JSON::Schema::Modern::Error::::mode JSON::Schema::Modern::Error::mode

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	2µs			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
3	1	31µs			my $isa_check_for_mode = ${$_[1]->{"\$isa_check_for_mode"}};
4	1	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
5					package JSON::Schema::Modern::Error;
6	2	39µs	2	44µs	# spent 28µs (12+16) within JSON::Schema::Modern::Error::BEGIN@6 which was called: # once (12µs+16µs) by Sub::Quote::_clean_eval at line 6 no warnings 'closure'; # spent 28µs making 1 call to JSON::Schema::Modern::Error::BEGIN@6 # spent 16µs making 1 call to warnings::unimport
7					sub mode {
8					($_QUOTED,$_UNQUOTED) if 0;
9					# BEGIN quote_sub PRELUDE
10					package Method::Generate::Accessor::_Generated;
11					# spent 2µs within Method::Generate::Accessor::_Generated::BEGIN@11 which was called: # once (2µs+0s) by Sub::Quote::_clean_eval at line 16 BEGIN {
12	1	0s			$^H = 1762;
13	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
14	1	2µs			%^H = (
15					);
16	1	21µs	1	2µs	} # spent 2µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@11
17					# END quote_sub PRELUDE
18					(@_ > 1
19					? scalar do { my $value = $_[1];
20	2	175µs	2	21µs	# spent 13µs (5+8) within Method::Generate::Accessor::_Generated::BEGIN@20 which was called: # once (5µs+8µs) by Sub::Quote::_clean_eval at line 20 (do { no warnings "void"; package Type::Tiny; ((defined($value) and !ref($value) and $value =~ m{\A(?:(?:evaluate\|traverse))\z})) or Type::Tiny::_failed_check($isa_check_for_mode, "Enum[\"traverse\",\"evaluate\"]", $value, "attribute_name","mode","attribute_step","isa check","mgaca","0","varname","\$self->{\"mode\"}"); $value }), # spent 13µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@20 # spent 8µs making 1 call to warnings::unimport
21					($_[0]->{"mode"} = $value),
22					($_[0]->{"mode"}),
23					}
24					: $_[0]->{"mode"}
25					) }
26	1	1µs			$$_UNQUOTED = \&mode;
27					}
28	1	6µs			1;
29
30					;